function parnew=mlogit(param); 
% ==============================================================
% MLOGIT.m
% 
% LOGIT transformation 
% Inverse given by function INVMLOGIT.m
% Toolbox: MYMIN.m 
% Alejandro Justiniano 2/22/2006 
% ----------------------------------------------------------------
np     = length( param ); 
a      = 1e-4*ones(np,1); 
parnew = log( param(:) - a ); 

        